home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX Base Documentation 1998 November
/
IRIX 6.5.2 Base Documentation November 1998.img
/
usr
/
share
/
catman
/
p_man
/
cat3
/
f90
/
uscctc.z
/
uscctc
Wrap
Text File
|
1998-10-30
|
4KB
|
91 lines
USCCTC(3F) Last changed: 1-6-98
NNAAMMEE
UUSSCCCCTTCC, UUSSCCCCTTII - Converts EBCDIC character data to ASCII character
data, and vice versa
SSYYNNOOPPSSIISS
CCAALLLL UUSSCCCCTTCC ((_s_r_c,, _i_s_b,, _d_e_s_t,, _n_u_m,, _n_p_w [[,,_v_a_l]]))
CCAALLLL UUSSCCCCTTII ((_s_r_c,, _d_e_s_t,, _i_s_b,, _n_u_m,, _n_p_w [[,,_v_a_l]]))
IIMMPPLLEEMMEENNTTAATTIIOONN
UNICOS, UNICOS/mk, and IRIX systems
DDEESSCCRRIIPPTTIIOONN
On IRIX systems, this routine is in lliibbffffiioo..ssoo which is linked by
default when compiling programs with the MIPSpro 7 Fortran 90 compiler
or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
7.2 F77 compiler.
UUSSCCCCTTCC converts EBCDIC character data to ASCII character data. UUSSCCCCTTII
converts ASCII character data to EBCDIC character data. All
non-printing characters are converted to blanks.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX, the arguments must be of type integer with
KKIINNDD==88.
The following is a list of valid arguments for this routine.
_s_r_c Variable or array of any type (except CHARACTER) containing
the character data to be converted.
_i_s_b An integer variable or constant containing the starting byte
offset to begin the data conversion. Bytes are numbered
from left to right, with the leftmost byte as byte 1. The
_i_s_b argument applies to the _s_r_c (UUSSCCCCTTCC) or _d_e_s_t (UUSSCCCCTTII)
argument.
_d_e_s_t Variable or array of any type (except CHARACTER) to receive
the character data to be converted.
_n_u_m An integer variable or constant containing the number of
characters to be converted.
_n_p_w An integer variable or constant containing the number of
characters to be placed in each word of _d_e_s_t (UUSSCCCCTTCC) or
obtained from each word of _s_r_c (UUSSCCCCTTII). A positive value
for _n_p_w (1 to 8) indicates left-justification. A negative
value (-1 to -8) indicates right-justification. For UUSSCCCCTTCC,
left-justified output is also blank-filled. Note that _n_p_w
values of 8 and -8 are equivalent.
_v_a_l An optional integer or logical variable or constant which,
if specified and nonzero (.TRUE.), indicates that all lower
case input is to be folded to upper case output. The
default, if the argument is not specified, is no case
folding.
NNOOTTEESS
The following conditions must be met for any character data to be
converted:
_n_u_m >= 0
_i_s_b > 0
0 < |_n_p_w| < 9
If _n_u_m is not an even multiple of 8, the UUSSCCCCTTII routine will place the
remaining converted characters in the final word of _d_e_s_t while
preserving the rest of the original contents of the word.
CCAAUUTTIIOONNSS
The same variable or array can be specified for _s_r_c (input) and _d_e_s_t
(output) if and only if _i_s_b is 1 and _n_p_w is 8 (or -8). The results of
overlapping conversions using any other values for _i_s_b and _n_p_w are
undefined.
EEXXAAMMPPLLEESS
The following Fortran code converts 800 characters from EBCDIC to
ASCII. The ASCII characters are placed one per word, right-justified.
INTEGER EBCDIC(100)
INTEGER ASCII (800)
CALL USCCTC(EBCDIC, 1, ASCII, 800, -1, .FALSE.)
SSEEEE AALLSSOO
_A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
2165, for the printed version of this man page.